﻿Imports Aricie.DNN.UI.Attributes
Imports DotNetNuke.UI.WebControls
Imports System.ComponentModel

Namespace Aricie.DNN.Services.Url.FriendlyUrl
    <Serializable()> _
    Public Class ConstantUrlGroup
        Inherits UrlGroup


        <Browsable(False)> _
        <ExtendedCategory("TechnicalSettings")> _
        Public Overrides Property EnableFilter() As Boolean
            Get
                Return False 'never allow filters on constants
            End Get
            Set(value As Boolean)
            End Set
        End Property

        <SortOrder(0)> _
        <ExtendedCategory("MainSettings")> _
        Public Property Value() As String = ""

        Protected Overrides Function ProcessRewrite(ByVal writer As UrlRewriteContext) As GroupRewriteResult
            Return New GroupRewriteResult(Me._Value)
        End Function



        Protected Overrides Function GetName() As String
            Return Me.Value
        End Function

    End Class
End Namespace